home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib13.dsk / PAGE FLIP DEMO.bas < prev    next >
BASIC Source File  |  2023-02-26  |  259b  |  5 lines
  1. 100  HCOLOR= 3: HGR : HPLOT 50,50 TO 50,60: REM  DRAW A 1 ON PAGE 1
  2. 110  HGR2 : HPLOT 100,50 TO 110,50 TO 110,55 TO 100,57 TO 100,60 TO 110,60: REM  DRAW A 2 ON PAGE 2
  3. 120  POKE 49236,0: REM  DISPLAY PAGE 1
  4. 130  POKE 49237,0: REM  DISPLAY PAGE 2
  5. 140  GOTO 120